home *** CD-ROM | disk | FTP | other *** search
/ Collection of Tools & Utilities / Collection of Tools and Utilities.iso / basic / dialogic.zip / DIALOG11.DB < prev    next >
Text File  |  1990-01-31  |  4KB  |  119 lines
  1. DB(Level%, 1).Code = 1
  2. DB(Level%, 1).Y = 0
  3. DB(Level%, 1).X = 0
  4. DB(Level%, 1).Height = 17
  5. DB(Level%, 1).Wdth = 65
  6. DB(Level%, 1).BorderType = -1
  7. DB(Level%, 1).PrimaryColor = -c1
  8. DB(Level%, 1).WindowColor = -c1
  9. DB(Level%, 1).Text = "Simulated MultiTasking"
  10. DB(Level%, 1).TextColor = c2
  11. DB(Level%, 1).SecondaryColor = c1
  12.  
  13. LB(1).Text = "DiaLogic handles all logic needed to run a dialog box."
  14. LB(2).Text = "There are several ways in which dialog boxes may be"
  15. LB(3).Text = "activated.  You may pass full control to a dialog box"
  16. LB(4).Text = "from a calling program until the dialog box is closed"
  17. LB(5).Text = "and cleared from the screen.  You may also set up a dialog"
  18. LB(6).Text = "box and regain control immediately.  This allows the call-"
  19. LB(7).Text = "ing program to do something before control is passed back"
  20. LB(8).Text = "to DiaLogic.  You may also generate a dialog box to"
  21. LB(9).Text = "be used in polled mode.  This allows a background process"
  22. LB(10).Text = "to take place while the dialog box is active.  This dialog"
  23. LB(11).Text = "box demonstrates such simulated multitasking.  These modes"
  24. LB(12).Text = "of operation allow you to have full control of all dialog"
  25. LB(13).Text = "boxes.  If needed you may also modify dialog boxes as they "
  26. LB(14).Text = "are being used!  This allows you to change certain options"
  27. LB(15).Text = "based on what the user has already chosen.  The example be-"
  28. LB(16).Text = "low demonstrates how a calling program may update a dialog"
  29. LB(17).Text = "box on-the-fly while multitasking."
  30.  
  31. DB(Level%, 2).Code = 3
  32. DB(Level%, 2).Y = 2
  33. DB(Level%, 2).X = 2
  34. DB(Level%, 2).Height = 6
  35. DB(Level%, 2).Wdth = 1
  36. DB(Level%, 2).WindowColor = c1
  37. DB(Level%, 2).PrimaryColor = c1
  38. DB(Level%, 2).SecondaryColor = c2
  39. DB(Level%, 2).SelectedColor = -1
  40. DB(Level%, 2).StarColor = c1
  41. DB(Level%, 2).ItemLength = 60
  42. DB(Level%, 2).KeyColor = 0
  43. DB(Level%, 2).BorderType = 2
  44. DB(Level%, 2).Link = 0
  45. DB(Level%, 2).TextY = 0
  46. DB(Level%, 2).TextX = 0
  47. DB(Level%, 2).TextColor = c1
  48. DB(Level%, 2).NumberOne = 1
  49. DB(Level%, 2).NumberTwo = 17
  50. DB(Level%, 2).Default = 0
  51.  
  52. DB(Level%, 3).Code = 5
  53. DB(Level%, 3).NumberOne = 3
  54. DB(Level%, 3).Default = 1
  55. DB(Level%, 3).TextString = "11,10,12,10,13,10"         'Location String (delimiter = ,)
  56. DB(Level%, 3).WindowColor = c1
  57. DB(Level%, 3).SelectedColor = c1
  58. DB(Level%, 3).StarColor = c1
  59.  
  60. DB(Level%, 4).Code = 6
  61. DB(Level%, 4).Y = 11
  62. DB(Level%, 4).X = 14
  63. DB(Level%, 4).Text = "Factors of ~10"
  64. DB(Level%, 4).TextColor = c1
  65. DB(Level%, 4).KeyColor = c4
  66. DB(Level%, 4).Link = 3
  67. DB(Level%, 4).NumberOne = 1
  68.  
  69. DB(Level%, 5).Code = 6
  70. DB(Level%, 5).Y = 12
  71. DB(Level%, 5).X = 14
  72. DB(Level%, 5).Text = "Factors of ~20"
  73. DB(Level%, 5).TextColor = c1
  74. DB(Level%, 5).KeyColor = c4
  75. DB(Level%, 5).Link = 3
  76. DB(Level%, 5).NumberOne = 2
  77.  
  78. DB(Level%, 6).Code = 6
  79. DB(Level%, 6).Y = 13
  80. DB(Level%, 6).X = 14
  81. DB(Level%, 6).Text = "Factors of 2~3"
  82. DB(Level%, 6).TextColor = c1
  83. DB(Level%, 6).KeyColor = c4
  84. DB(Level%, 6).Link = 3
  85. DB(Level%, 6).NumberOne = 3
  86.  
  87. DB(Level%, 7).Code = 8
  88. DB(Level%, 7).Y = 10
  89. DB(Level%, 7).X = 9
  90. DB(Level%, 7).Height = 4
  91. DB(Level%, 7).Wdth = 20
  92. DB(Level%, 7).BorderType = 1
  93. DB(Level%, 7).SecondaryColor = c1
  94. DB(Level%, 7).Text = "Display:"
  95. DB(Level%, 7).TextColor = c1
  96.  
  97. DB(Level%, 8).Code = 8
  98. DB(Level%, 8).Y = 10
  99. DB(Level%, 8).X = 35
  100. DB(Level%, 8).Height = 2
  101. DB(Level%, 8).Wdth = 23
  102. DB(Level%, 8).BorderType = 1
  103. DB(Level%, 8).SecondaryColor = c1
  104. DB(Level%, 8).Text = "Answer:"
  105. DB(Level%, 8).TextColor = c1
  106.  
  107. DB(Level%, 9).Code = 7
  108. DB(Level%, 9).Y = 16
  109. DB(Level%, 9).X = 30
  110. DB(Level%, 9).Text = "~OK"
  111. DB(Level%, 9).PrimaryColor = c1
  112. DB(Level%, 9).WindowColor = c1
  113. DB(Level%, 9).SelectedColor = c3
  114. DB(Level%, 9).KeyColor = c4
  115. DB(Level%, 9).SecondaryColor = c4
  116. DB(Level%, 9).Default = 1
  117.  
  118. DB(Level%, 10).Code = 0
  119.